home *** CD-ROM | disk | FTP | other *** search
/ Bubka 15 / Bubka 15.iso / html / puzzle / 03.dcr / 00010_kaiten2.ls < prev    next >
Encoding:
Text File  |  2002-07-20  |  227 b   |  11 lines

  1. on exitFrame me
  2.   global withlist
  3.   repeat with i = 51 to 80
  4.     if getAt(withlist, i - 50) = 0 then
  5.       set the loc of sprite i to the loc of sprite (i - 40)
  6.       sprite(i).rotation = 0
  7.     end if
  8.   end repeat
  9.   go(50)
  10. end
  11.